home *** CD-ROM | disk | FTP | other *** search
/ SuperModels in the Rainforest / SuperModels in the Rainforest.iso / rain.dxr / 00110.ls < prev    next >
Encoding:
Text File  |  1995-10-13  |  327 b   |  18 lines

  1. on nameplate
  2.   global name
  3.   if name = 0 then
  4.     startTimer()
  5.     repeat while the timer < 15
  6.     end repeat
  7.     if the machineType = 256 then
  8.       puppetTransition(50, 2, 80, 1)
  9.     else
  10.       puppetTransition(50, 4, 20, 1)
  11.     end if
  12.     set the visible of sprite 8 to 0
  13.     set name to 1
  14.   else
  15.     nothing()
  16.   end if
  17. end
  18.